// Values (值) 示例
// 演示 Pascal 中不同类型的值和基本操作
program p_2_values;

{$mode objfpc}{$H+}
// {$mode objfpc} 启用 Object Pascal 模式
// {$H+} 启用长字符串支持（AnsiString）

// 引入单元文件
uses
  SysUtils;  // 系统工具单元，包含常用的系统函数

// 声明变量部分
var
  // 整数类型值
  integerValue: Integer;
  
  // 实数类型值
  realValue: Real;
  
  // 字符类型值
  charValue: Char;
  
  // 布尔类型值
  booleanValue: Boolean;
  
  // 字符串类型值
  stringValue: String;

// 程序主入口
begin
  // 给整数变量赋值
  integerValue := 42;
  
  // 给实数变量赋值
  realValue := 3.14159;
  
  // 给字符变量赋值
  charValue := 'P';
  
  // 给布尔变量赋值
  booleanValue := True;
  
  // 给字符串变量赋值
  stringValue := 'Hello Pascal!';
  
  // 输出各种类型的值
  WriteLn('整数值: ', integerValue);
  WriteLn('实数值: ', realValue:0:5);  // 格式化输出，保留5位小数
  WriteLn('字符值: ', charValue);
  WriteLn('布尔值: ', booleanValue);
  WriteLn('字符串值: ', stringValue);
  
  WriteLn;
  WriteLn('这些是 Pascal 中的基本值类型演示');
  
  // 等待用户按键，防止程序窗口立即关闭
  ReadLn;
end.